home *** CD-ROM | disk | FTP | other *** search
/ The X-Philes (2nd Revision) / The X-Philes Number 1 (1995).iso / xphiles / hp48hor1 / fromasc.cc < prev    next >
Text File  |  1991-01-29  |  986b  |  37 lines

  1. 000D1 A.A = size-1
  2. 000DA start new object phase
  3. 000E1 D (characters remaining in line) = 64
  4. 000E4 B.A = size-1
  5. 000E6 A.A = adr of alloc str
  6. 000E9 D0 = adr of alloc str
  7. 000EC D0 = adr of new object (alloc str data)
  8. 000EF A.A = adr of new object
  9. 000F2 ...
  10. 000F5 adjust stack to new object
  11. 000F8 A = adr of orig str
  12. 000FB ...
  13. 000FE C = adr of checksum
  14. 00101 ...
  15. 00104 save checksum adr
  16. 00106 D1 = adr of orig str
  17. 00109 D1 = adr of orig str data
  18. 0010C count character in line
  19. 0010F go if not EOL
  20. 00112 reset D for new line (D=63)
  21. 00116 ...
  22. 00119 skip EOL character
  23. 0011C convert character to nibble
  24. 00141 store nibble into new object
  25. 00145 next nibble in new object
  26. 00148 next character in orig str
  27. 0014B decr characters remaining
  28. 0014D go if more
  29. 00150 exit if checksum in progress
  30. 00155 B.A = 3 (size of checksum - 1)
  31. 0015C ...
  32. 0015E C = adr of checksum
  33. 00160 D0 = adr of checksum data
  34. 00163 ...
  35. 00166 start of checksum phase
  36. 00169 go process checksum
  37.